Language/OS - Multiplatform Resource Library/LANGUAGE OS.iso/lisp/eulisp/comp0_89.lha/Feel/Boot/Compiler/stop.sc

Text File | 1993-07-16 | 3KB | 1 lines

(dependencies (standard0 list-fns) names (stop) length 608 nslots 8 code ((36 (%%-big-arg-%% 17)) (5 (%%-big-arg-%% 0)) (3 0) (31 (%%-big-arg-%% 140)) (17 1) (36 (%%-big-arg-%% 27)) (5 (%%-big-arg-%% 0)) (4 (%%-static-%% . 11)) (46) (1 (%%-link-me-%% boot . make-installed-module)) (34 2) (36 (%%-big-arg-%% 70)) (5 (%%-big-arg-%% 0)) (8 3) (4 (%%-static-%% . 9)) (5 (%%-me-local--%% . vals)) (3 0) (39) (8 0) (5 (%%-me-local--%% . cont)) (3 0) (39) (28 1) (5 (%%-me-local--%% . stop)) (3 0) (39) (28 1) (5 (%%-me-local--%% . set-ignore)) (3 0) (39) (28 1) (17 1) (1 (%%-link-me-%% boot . install-local-bindings)) (34 3) (17 1) (36 (%%-big-arg-%% 28)) (5 (%%-big-arg-%% 1)) (8 3) (4 (%%-static-%% . 10)) (1 (%%-link-me-%% boot . make-interface)) (34 2) (17 1) (14 2 1) (37) (22 0) (36 (%%-big-arg-%% 115)) (1 (%%-link-me-%% init . make)) (1 (%%-link-me-%% class-names . <class>)) (4 (%%-static-%% . 0)) (3 0) (39) (9) (4 (%%-static-%% . 1)) (3 0) (39) (29) (4 (%%-static-%% . 2)) (3 0) (39) (29) (1 (%%-link-me-%% errors . <condition>)) (3 0) (39) (3 0) (39) (29) (4 (%%-static-%% . 3)) (3 0) (39) (29) (3 0) (3 0) (39) (29) (4 (%%-static-%% . 4)) (3 0) (39) (29) (3 0) (3 0) (39) (29) (4 (%%-static-%% . 5)) (3 0) (39) (29) (3 0) (3 0) (39) (29) (18) (11) (34 -2) (7 (%%-me-local--%% . Stop)) (3 0) (7 (%%-me-local--%% . *cont*)) (3 0) (7 (%%-me-local--%% . *vals*)) (3 0) (7 (%%-me-local--%% . *ignore*)) (36 (%%-big-arg-%% 303)) (11) (4 (%%-static-%% . 6)) (5 (%%-big-arg-%% 0)) (39) (51 1) (7 (%%-me-local--%% . set-ignore)) (36 (%%-big-arg-%% 150)) (11) (4 (%%-static-%% . 6)) (6 1) (39) (51 1) (7 (%%-me-local--%% . stop)) (36 (%%-big-arg-%% 112)) (11) (4 (%%-static-%% . 6)) (6 2) (39) (51 0) (7 (%%-me-local--%% . cont)) (36 (%%-big-arg-%% 84)) (11) (4 (%%-static-%% . 6)) (6 3) (39) (51 0) (7 (%%-me-local--%% . vals)) (36 (%%-big-arg-%% 48)) (36 (%%-big-arg-%% 26)) (1 (%%-link-me-%% init . setter)) (1 (%%-link-me-%% init . setter)) (10) (33 1) (4 (%%-me-local--%% . vals)) (36 (%%-big-arg-%% 17)) (8 6) (40 1) (11) (33 2) (17 2) (3 1) (37) (10) (9) (7 (%%-me-local--%% . *vals*)) (15 3) (37) (18) (4 (%%-me-local--%% . *vals*)) (37) (4 (%%-me-local--%% . *cont*)) (4 (%%-me-local--%% . *vals*)) (13 2) (9) (13 3) (33 1) (22 1) (10) (20 0 0) (36 (%%-big-arg-%% 22)) (1 (%%-link-me-%% boot . not)) (4 (%%-me-local--%% . *ignore*)) (10) (34 1) (32 (%%-big-arg-%% 28)) (1 (%%-link-me-%% calls . simple-call/cc)) (36 (%%-big-arg-%% 21)) (12) (40 1) (14 4 2) (62 1) (37) (9) (19 0 0) (15 3) (37) (10) (9) (7 (%%-me-local--%% . *cont*)) (18) (9) (19 0 0) (9) (7 (%%-me-local--%% . *vals*)) (18) (1 (%%-link-me-%% init . cerror)) (4 (%%-static-%% . 7)) (4 (%%-me-local--%% . Stop)) (4 (%%-static-%% . 8)) (3 0) (39) (9) (8 5) (19 0 0) (3 0) (39) (29) (18) (12) (14 7 4) (9) (13 5) (34 -3) (10) (9) (7 (%%-me-local--%% . *ignore*)) (15 3) (37)) statics (name Stop direct-superclasses direct-slot-descriptions metaclass-hypotheses direct-initargs stop "Stopping..." error-value (vals cont stop set-ignore) ((strip (union (import standard0) (import list-fns))) vals cont stop set-ignore) stop))